perm filename MULT.F4[MUS,LCS] blob sn#171832 filedate 1975-08-02 generic text, type T, neo UTF8
00100	2	ACCEPT 1,J,K
00200	1	FORMAT(2I)
00300		L=J*K
00400		TYPE 1,L
00500		GO TO 2
00600		END